home *** CD-ROM | disk | FTP | other *** search
/ The Netter Presenter: Ur…ion in Overactive Bladder / The Netter Presenter: Urinary System - Structure & Function in Overactive Bladder.iso / mac / UrinarySystem.app / Contents / Notes.dxr / 00008_UI Generic Button behavior.ls < prev    next >
Encoding:
Text File  |  2003-12-02  |  1.1 KB  |  41 lines
  1. property outcurs, incurs, incursSet, customImage, customMask, oldcursor, useCustom, NormalState, OverState, DownState, ActiveState, InactiveState
  2.  
  3. on translate_cursor me, Setting, image, mask, Custom
  4.   val = [member(image), member(mask)]
  5.   return val
  6.   return Setting
  7. end
  8.  
  9. on endSprite me
  10.   oldcursor = member("point")
  11. end
  12.  
  13. on beginSprite me
  14.   oldcursor = member("point")
  15.   val = translate_cursor(me, me.incursSet, "point", "point mask", 1)
  16.   set the cursor of sprite the spriteNum of me to val
  17.   memref = the member of sprite the currentSpriteNum
  18.   castLibNum = memref.castLibNum
  19.   NormalState = member(member(memref).memberNum, castLibNum)
  20.   DownState = member(member(memref).memberNum + 1, castLibNum)
  21. end
  22.  
  23. on mouseEnter me
  24. end
  25.  
  26. on mouseLeave me
  27.   set the member of sprite the spriteNum of me to me.NormalState
  28. end
  29.  
  30. on mouseDown me
  31.   set the member of sprite the spriteNum of me to me.DownState
  32. end
  33.  
  34. on mouseUp me
  35.   set the member of sprite the spriteNum of me to me.NormalState
  36. end
  37.  
  38. on mouseUpOutSide me
  39.   set the member of sprite the spriteNum of me to me.NormalState
  40. end
  41.